;
; D52 configuration file for base-communicator.hex
; Generated by D52 V3.3.6 on 06/21/05 22:53
;

# 0000 ===========================================================
# 0000 ROM MEMORY LAYOUT
# 0000 0000-002f Interrupt Vector Table
# 0000 0030-003e ???
# 0000 003f-0074 Copyright Notice
# 0000 0075-0361 Main function
# 0000 0362-0387
# 0000 0388-03aa HEX Character to Byte Conversion
# 0000 03ab-03c6 Transmit Byte
# 0000 03c7-03d6 Delay
# 0000 03d7-048f Toggle Bit 7?
# 0000 0490-04a6 Check Bit 7
# 0000 04a7-04db Check config switches
# 0000 04dc-04e6 Transmit Acknowledge
# 0000 04e7-04ea Save Accumulator + Status (macro)
# 0000 04eb-04ee Restore Accumulator + Status (macro)
# 0000 04ef-0539 Timer/Counter 0 Interrupt Service Routine
# 0000 053a-053c INT 0 Interrupt Service Routine
# 0000 053d-0734 Serial Interrupt Service Routine
# 0000 
# 0000 ===========================================================
# 0000 IRAM MEMORY LAYOUT
# 0000 36-3d Receive Buffer 1
# 0000 3e-45 Receive Buffer 2
# 0000 58    Received Byte
# 0000 5a-63 Receiving Bytes
# 0000 6b    Timer 1 Reload value (for baudrate)
# 0000 66    Active Buffer pointer
# 0000 6c-7F Stack

; 20h.x
M 00 Rx_Invalid	; 20h.0 - Flag_0
M 01 Flag_1	; 20h.1
M 02 Flag_2	; 20h.2
M 03 Flag_3	; 20h.3
; 21h.x
M 08 Flag_8	; 21h.0
M 09 Flag_9	; 21h.1
M 0a Flag_10	; 21h.2
M 0b Flag_11	; 21h.3
M 0c Flag_12	; 21h.4
M 0d OddNibble	; 21h.5 - Flag_13
M 0e Flag_14	; 21h.6
M 0f Flag_15	; 21h.7
; 22h.x
M 10 Flag_16	; 22h.0
M 11 Flag_17	; 22h.1
M 12 Flag_sbuf_empty	; 22h.2
M 13 Flag_19	; 22h.3
M 14 Flag_20	; 22h.4
M 15 Flag_21	; 22h.5
M 16 Flag_22	; 22h.6
M 17 Flag_23	; 22h.7
; 23h.x
M 18 Fill_buf2	; 23h.0 - Flag_24
M 19 Flag_25	; 23h.1
M 1a Flag_26	; 23h.2
M 1b Flag_27	; 23h.3
M 1c Flag_28	; 23h.4
M 1d Flag_29	; 23h.5
M 1e Flag_30	; 23h.6
M 1f Flag_31	; 23h.7
; 24h.x
M 20 Flag_32	; 24h.0
M 21 Flag_33	; 24h.1
M 22 Flag_34	; 24h.2
M 23 Flag_35	; 24h.3
M 24 Flag_36	; 24h.4
M 25 Flag_37	; 24h.5
M 26 Flag_38	; 24h.6
M 27 Flag_39	; 24h.7
; 25h.x
M 28 Flag_40	; 25h.0
M 29 Flag_41	; 25h.1
M 2a Flag_42	; 25h.2
M 2b Flag_43	; 25h.3
M 2c Flag_44	; 25h.4
M 2d Flag_45	; 25h.5
M 2e Flag_46	; 25h.6
M 2f Flag_47	; 25h.7
;
F B0 p3_switches
R 6b t1_rval	; Timer 1 Reload value (for baudrate)
R 58 Rx_Byte	; Received Byte

L 00a2 Loop01
L 01e8 Loop02
L 032e Loop03
L 0334 Loop04
L 03cb Loop05
L 03cd Loop06
L 04de Loop07

# 0000
# 0000
# 0000 ===========================================================
# 0000 Interrupt Vector Table
# 0000
L 0000	reset
L 0003	ie0vec
L 000b	tf0vec
L 0013	ie1vec
L 001b	tf1vec
L 0023	servec
C 0003	; external 0 interrupt
C 000b	; timer 0 overflow interrupt
C 0013	; external 1 interrupt
C 001b	; timer 1 overflow interrupt
C 0023	; serial xmit/recv interrupt
# 002f ===========================================================


;t 0030-0073	; 
t 003F-0074	; Copyright notice


# 0075
# 0075 ===========================================================
# 0075 Main code
# 0075
L 0075 Start	; LABEL
! 0075 Initialize Receiving Bytes
! 008d Initialize Bits 18-1f
! 00a8 Initialize Port 0
! 00ab Initialize Port 1
! 00ae Initialize Port 2
! 00b1 Initialize Port 3
! 00b4 Initialize Stack Pointer
! 00b7 Initialize Bits 00-07
! 00ba Initialize Serial Control register (8bit UART, Timer 1, Ignore invalid stop bits, Receiver Enabled)
! 00bd Initialize Interrupt Enable register (Global Interrupt Enabled, Serial Interrupt Enabled)
! 00c2 Check config switches (P3)
! 00c9 Initialize Bits 08-0f
! 00cc Initialize Bits 10-17
! 00cf Initialize Bits 18-1f
! 00f7 Initialize Interrupt Priority register

L 0179 Switch_r2
B 017f-018e
L 00ea State_1
L 01d5 State_2
L 02a8 State_3
L 01dd State_4
L 02d9 State_5
L 01f1 State_6
L 02ef State_7
L 01fd State_8
L 0315 State_9
L 020f State_10
L 0325 State_11
L 021f State_12
L 011c State_13
L 012e State_14
L 0141 State_15
L 015d State_16

# 0362 ===========================================================\

# 0388 ===========================================================
# 0388 HEX Character to Byte Conversion
L 0388 Hex2Byte

# 03ab ===========================================================
# 03ab Transmit Byte
L 03ab Tx_Byte

# 03c7 ===========================================================
# 03c7 Delay
L 03c7 delay

# 03d7 ===========================================================
# 03d7 Toggle Bit 7?
L 03d7 b7_tgl

# 0490 ===========================================================
# 0490 Check Bit 7
L 0490 b7_chk

# 04a7 
# 04a7 ===========================================================
# 04a7 Check config switches
# 04a7 
# 04a7 Sw | pcon rval | baud
# 04a7 -- + ---  ---_ + ---- 
# 04a7 00 | 00h  fdh  | 9600
# 04a7 10 | 00h  fah  | 4800
# 04a7 20 | 00h  f4h  | 2400
# 04a7 30 | 00h  e8h  | 1200
# 04a7 40 | 80h  fdh  | 19k2
# 04a7 
L 04a7 sw_chk
! 04ab t1_rval=fdh
! 04ae pcon=00h
L 04b9 sw_not4
! 04b4 if switches=40h then (t1_rval=fdh,)  pcon=80h
L 04c1 sw_not1
! 04bc if switches=10h then  t1_rval=fah,  (pcon=00h)
L 04c9 sw_not2
! 04c4 if switches=20h then  t1_rval=f4h,  (pcon=00h)
! 04cc if switches=30h then  t1_rval=e8h,  (pcon=00h)
! 04d5 Timer Mode (Timer 1: 8-bit auto-reload, Timer 2: 16 bit)
! 04d8 Timer Control (Timer 1 Run, INT0 falling edge)
L 04cf sw_end

# 04dc ===========================================================
# 04dc Transmit Acknowledge
L 04dc TX_ACK

# 04e7 ===========================================================
# 04e7 Save Accumulator + Status
L 04e7 SAVE
# 04eb ===========================================================
# 04eb Restore Accumulator + Status
L 04eb RESTORE

# 04ef
# 04ef ===========================================================
# 04ef Timer/Counter 0 Interrupt Service Routine
# 04ef
L 04ef CTR0_ISR	; Timer/Counter 0 Interrupt Service Routine
C 052d-0530
L 0535 CTR0_END	; End of CTR0_END

# 053a
# 053a ===========================================================
# 053a INT 0 Interrupt Service Routine
# 053a
# 053a
L 053a INT0_ISR	; INT 0 Interrupt Service Routine

# 053d
# 053d
# 053d ===========================================================
# 053d Serial Interrupt Service Routine
# 053d
L 053d SER_ISR	; Serial Interrupt Service Routine
L 054a SER_RCV	; Receive part of SER_ISR
L 0730 SER_END	; End of SER_ISR
# 0735 ===========================================================
